Require CL for `case'.

diff --git a/lisp/vc-arch.el b/lisp/vc-arch.el
index 042b4bbbdca7e878df1391fba309192659a171dc..32c5f5459adf634ef26fff296ba66f1b083a9cda 100644 (file)
--- a/lisp/vc-arch.el
+++ b/lisp/vc-arch.el
@@ -55,7 +55,7 @@
 
 ;;; Code:
 
-(eval-when-compile (require 'vc))
+(eval-when-compile (require 'vc) (require 'cl))
 
 ;;;
 ;;; Customization options